home *** CD-ROM | disk | FTP | other *** search
/ Aminet 31 / Aminet 31 (1999)(Schatztruhe)[!][Jun 1999].iso / Aminet / comm / bbs / cnet5demo.lha / cnet / ircrexx / jointrap.rexx < prev    next >
OS/2 REXX Batch file  |  1999-03-23  |  376b  |  14 lines

  1. /* ORC - TRAP JOIN                                                 */
  2. /* '/alias <password> trap1----005 jointrap.rexx JOIN              */
  3. options results
  4. parse arg orcport nick cmd args
  5. parse var nick ':'nick'!'site
  6. parse var args ':'args
  7.  
  8. if show('P', orcport) then do
  9.   address value orcport
  10.     cnetirccmd '// notice 'nick' :Hello 'nick', welcome to 'args'!  8)'
  11. end
  12.  
  13.  
  14.